home *** CD-ROM | disk | FTP | other *** search
/ Especial Multimedia / Especial Multimedia.iso / Multimed / Musica / ZMUD32.ZIP / ZMUD.EXE / 0 / RCDATA / TMENUDLG / TMENUDLG.txt
Text File  |  1997-06-09  |  11KB  |  409 lines
  1. object MenuDlg: TMenuDlg
  2.   Left = 157
  3.   Top = 317
  4.   ActiveControl = OKBtn
  5.   BorderStyle = bsDialog
  6.   Caption = 'Speed Menu'
  7.   ClientHeight = 331
  8.   ClientWidth = 564
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = [fsBold]
  13.   Position = poScreenCenter
  14.   ShowHint = True
  15.   OnActivate = FormActivate
  16.   OnCreate = FormCreate
  17.   OnDeactivate = FormDeactivate
  18.   PixelsPerInch = 96
  19.   TextHeight = 13
  20.   object Label8: TLabel
  21.     Left = 8
  22.     Top = 26
  23.     Width = 115
  24.     Height = 13
  25.     Caption = 'Click on an item to edit it'
  26.     Font.Color = clWindowText
  27.     Font.Height = -11
  28.     Font.Name = 'MS Sans Serif'
  29.     Font.Style = []
  30.     ParentFont = False
  31.   end
  32.   object Image1: TImage
  33.     Left = 184
  34.     Top = 8
  35.     Width = 32
  36.     Height = 32
  37.     AutoSize = True
  38.   end
  39.   object Label3: TLabel
  40.     Left = 224
  41.     Top = 16
  42.     Width = 189
  43.     Height = 13
  44.     Caption = 'The Speed Menu is activated when you'
  45.     Font.Color = clWindowText
  46.     Font.Height = -11
  47.     Font.Name = 'MS Sans Serif'
  48.     Font.Style = []
  49.     ParentFont = False
  50.   end
  51.   object AliasText: TLabel
  52.     Left = 194
  53.     Top = 130
  54.     Width = 39
  55.     Height = 13
  56.     Alignment = taRightJustify
  57.     Caption = 'Caption:'
  58.     Font.Color = clWindowText
  59.     Font.Height = -11
  60.     Font.Name = 'MS Sans Serif'
  61.     Font.Style = []
  62.     ParentFont = False
  63.   end
  64.   object ComText: TLabel
  65.     Left = 178
  66.     Top = 154
  67.     Width = 55
  68.     Height = 13
  69.     Alignment = taRightJustify
  70.     Caption = 'Commands:'
  71.     Font.Color = clWindowText
  72.     Font.Height = -11
  73.     Font.Name = 'MS Sans Serif'
  74.     Font.Style = []
  75.     ParentFont = False
  76.   end
  77.   object Bevel1: TBevel
  78.     Left = 168
  79.     Top = 10
  80.     Width = 9
  81.     Height = 259
  82.     Shape = bsLeftLine
  83.   end
  84.   object Label1: TLabel
  85.     Left = 240
  86.     Top = 30
  87.     Width = 181
  88.     Height = 13
  89.     Caption = 'right click on the MUD output window.'
  90.     Font.Color = clWindowText
  91.     Font.Height = -11
  92.     Font.Name = 'MS Sans Serif'
  93.     Font.Style = []
  94.     ParentFont = False
  95.   end
  96.   object Label2: TLabel
  97.     Left = 224
  98.     Top = 48
  99.     Width = 268
  100.     Height = 13
  101.     Caption = 'Specify a caption for each item, along a list of commands'
  102.     Font.Color = clWindowText
  103.     Font.Height = -11
  104.     Font.Name = 'MS Sans Serif'
  105.     Font.Style = []
  106.     ParentFont = False
  107.   end
  108.   object HelpTxt: TLabel
  109.     Left = 240
  110.     Top = 62
  111.     Width = 218
  112.     Height = 13
  113.     Caption = 'seperate multiple commands with a ; character'
  114.     Font.Color = clWindowText
  115.     Font.Height = -11
  116.     Font.Name = 'MS Sans Serif'
  117.     Font.Style = []
  118.     ParentFont = False
  119.   end
  120.   object Help2: TLabel
  121.     Left = 240
  122.     Top = 76
  123.     Width = 248
  124.     Height = 13
  125.     Caption = 'use %selword and %selline to refer to the word or line'
  126.     Font.Color = clWindowText
  127.     Font.Height = -11
  128.     Font.Name = 'MS Sans Serif'
  129.     Font.Style = []
  130.     ParentFont = False
  131.   end
  132.   object Label6: TLabel
  133.     Left = 256
  134.     Top = 90
  135.     Width = 115
  136.     Height = 13
  137.     Caption = 'that was right-clicked on'
  138.     Font.Color = clWindowText
  139.     Font.Height = -11
  140.     Font.Name = 'MS Sans Serif'
  141.     Font.Style = []
  142.     ParentFont = False
  143.   end
  144.   object SpeedButton1: TSpeedButton
  145.     Left = 240
  146.     Top = 152
  147.     Width = 20
  148.     Height = 20
  149.     Hint = 'Edit command|'
  150.     Glyph.Data = {
  151.       78010000424D7801000000000000760000002800000020000000100000000100
  152.       04000000000000000000120B0000120B00000000000000000000000000000000
  153.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  154.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
  155.       000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
  156.       00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
  157.       F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
  158.       0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
  159.       FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
  160.       FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
  161.       0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
  162.       00333377737FFFFF7733333033000000033333373377777773330000}
  163.     NumGlyphs = 2
  164.     OnClick = SpeedButton1Click
  165.   end
  166.   object Label7: TLabel
  167.     Left = 8
  168.     Top = 10
  169.     Width = 106
  170.     Height = 13
  171.     Caption = 'Speed Menu Items'
  172.     Font.Color = clWindowText
  173.     Font.Height = -11
  174.     Font.Name = 'MS Sans Serif'
  175.     Font.Style = [fsBold]
  176.     ParentFont = False
  177.   end
  178.   object OKBtn: TBitBtn
  179.     Left = 320
  180.     Top = 278
  181.     Width = 77
  182.     Height = 27
  183.     Font.Color = clBtnText
  184.     Font.Height = -11
  185.     Font.Name = 'MS Sans Serif'
  186.     Font.Style = []
  187.     ParentFont = False
  188.     TabOrder = 4
  189.     OnClick = OKBtnClick
  190.     Kind = bkOK
  191.     Spacing = -1
  192.     IsControl = True
  193.   end
  194.   object CancelBtn: TBitBtn
  195.     Left = 402
  196.     Top = 278
  197.     Width = 77
  198.     Height = 27
  199.     Font.Color = clBtnText
  200.     Font.Height = -11
  201.     Font.Name = 'MS Sans Serif'
  202.     Font.Style = []
  203.     ParentFont = False
  204.     TabOrder = 5
  205.     OnClick = CancelBtnClick
  206.     Kind = bkCancel
  207.     Spacing = -1
  208.     IsControl = True
  209.   end
  210.   object HelpBtn: TBitBtn
  211.     Left = 484
  212.     Top = 278
  213.     Width = 77
  214.     Height = 27
  215.     HelpContext = 245
  216.     Font.Color = clBtnText
  217.     Font.Height = -11
  218.     Font.Name = 'MS Sans Serif'
  219.     Font.Style = []
  220.     ParentFont = False
  221.     TabOrder = 6
  222.     Kind = bkHelp
  223.     Spacing = -1
  224.     IsControl = True
  225.   end
  226.   object MenuCaption: TEdit
  227.     Left = 240
  228.     Top = 128
  229.     Width = 81
  230.     Height = 21
  231.     Hint = '|Caption to be displayed in popup menu'
  232.     AutoSize = False
  233.     Font.Color = clWindowText
  234.     Font.Height = -11
  235.     Font.Name = 'MS Sans Serif'
  236.     Font.Style = []
  237.     ParentFont = False
  238.     TabOrder = 0
  239.     OnChange = MenuCaptionChange
  240.   end
  241.   object MenuCom: TEdit
  242.     Left = 264
  243.     Top = 152
  244.     Width = 241
  245.     Height = 21
  246.     Hint = '|Commands to be executed when menu item is selected'
  247.     AutoSize = False
  248.     Font.Color = clWindowText
  249.     Font.Height = -11
  250.     Font.Name = 'MS Sans Serif'
  251.     Font.Style = []
  252.     ParentFont = False
  253.     TabOrder = 1
  254.     OnChange = MenuComChange
  255.   end
  256.   object MenuList: TListBox
  257.     Left = 8
  258.     Top = 44
  259.     Width = 154
  260.     Height = 225
  261.     ExtendedSelect = False
  262.     Font.Color = clWindowText
  263.     Font.Height = -11
  264.     Font.Name = 'MS Sans Serif'
  265.     Font.Style = []
  266.     ItemHeight = 13
  267.     ParentFont = False
  268.     TabOrder = 7
  269.     OnClick = MenuListClick
  270.   end
  271.   object NewBtn: TBitBtn
  272.     Left = 8
  273.     Top = 278
  274.     Width = 62
  275.     Height = 27
  276.     Hint = 'Create a new menu item'
  277.     Caption = '&New'
  278.     Font.Color = clBtnText
  279.     Font.Height = -11
  280.     Font.Name = 'MS Sans Serif'
  281.     Font.Style = []
  282.     ParentFont = False
  283.     TabOrder = 8
  284.     OnClick = NewBtnClick
  285.     NumGlyphs = 2
  286.     Spacing = -1
  287.     IsControl = True
  288.   end
  289.   object DelBtn: TBitBtn
  290.     Left = 136
  291.     Top = 278
  292.     Width = 27
  293.     Height = 27
  294.     Hint = '|Delete menu item'
  295.     Font.Color = clBtnText
  296.     Font.Height = -11
  297.     Font.Name = 'MS Sans Serif'
  298.     Font.Style = []
  299.     ParentFont = False
  300.     TabOrder = 9
  301.     OnClick = DelBtnClick
  302.     NumGlyphs = 2
  303.     Spacing = -1
  304.     IsControl = True
  305.   end
  306.   object BitBtn4: TBitBtn
  307.     Left = 81
  308.     Top = 282
  309.     Width = 22
  310.     Height = 22
  311.     Hint = 'Move Menu Item Up'
  312.     ParentShowHint = False
  313.     ShowHint = True
  314.     TabOrder = 10
  315.     OnClick = BitBtn4Click
  316.     Glyph.Data = {
  317.       90010000424D9001000000000000760000002800000020000000100000000100
  318.       0400000000000001000000000000000000000000000000000000000000000000
  319.       80000080000000808000800000008000800080800000C0C0C000808080000000
  320.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  321.       3333333333333333333333333333333333333333333333333333333333333333
  322.       333333333333333333333333333333333333333333333333333333E444444444
  323.       44433338FFFFFFFFFFFF33E6666666666643333833333333333F333E66666666
  324.       643333338333333333F33333E666666643333333383333333F3333333E666664
  325.       3333333333833333F333333333E66643333333333338333F33333333333E6433
  326.       33333333333383F3333333333333E33333333333333338333333333333333333
  327.       3333333333333333333333333333333333333333333333333333333333333333
  328.       3333333333333333333333333333333333333333333333333333000000000000
  329.       0000000000000000000000000000000000000000}
  330.     Margin = 0
  331.     NumGlyphs = 2
  332.     Spacing = -1
  333.     IsControl = True
  334.   end
  335.   object BitBtn5: TBitBtn
  336.     Left = 104
  337.     Top = 282
  338.     Width = 22
  339.     Height = 22
  340.     Hint = 'Move Menu Item Down'
  341.     ParentShowHint = False
  342.     ShowHint = True
  343.     TabOrder = 11
  344.     OnClick = BitBtn5Click
  345.     Glyph.Data = {
  346.       90010000424D9001000000000000760000002800000020000000100000000100
  347.       0400000000000001000000000000000000000000000000000000000000000000
  348.       80000080000000808000800000008000800080800000C0C0C000808080000000
  349.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  350.       3333333333333333333333333333333333333333333333333333333333333333
  351.       333333333333333333333333333343333333333333333F333333333333346433
  352.       333333333333F383333333333346664333333333333F33383333333334666664
  353.       3333333333F333338333333346666666433333333F3333333833333466666666
  354.       64333333F3333333338333E6666666666643333F33333333333833EEEEEEEEEE
  355.       EE43333FFFFFFFFFFFF833333333333333333333333333333333333333333333
  356.       3333333333333333333333333333333333333333333333333333333333333333
  357.       3333333333333333333333333333333333333333333333333333000000000000
  358.       0000000000000000000000000000000000000000}
  359.     Margin = 0
  360.     NumGlyphs = 2
  361.     Spacing = -1
  362.     IsControl = True
  363.   end
  364.   object DefItem: TCheckBox
  365.     Left = 240
  366.     Top = 184
  367.     Width = 265
  368.     Height = 17
  369.     Hint = '|Execute this menu item with double-right click'
  370.     Caption = 'Make this the default double-click action'
  371.     Font.Color = clWindowText
  372.     Font.Height = -11
  373.     Font.Name = 'MS Sans Serif'
  374.     Font.Style = []
  375.     ParentFont = False
  376.     TabOrder = 2
  377.   end
  378.   object DefDef: TCheckBox
  379.     Left = 240
  380.     Top = 202
  381.     Width = 265
  382.     Height = 17
  383.     Hint = '|Double-right click executes last selected menu item'
  384.     Caption = 'Use last selected item as default action'
  385.     Font.Color = clWindowText
  386.     Font.Height = -11
  387.     Font.Name = 'MS Sans Serif'
  388.     Font.Style = []
  389.     ParentFont = False
  390.     TabOrder = 3
  391.     OnClick = DefDefClick
  392.   end
  393.   object HelpPanel: TPanel
  394.     Left = 0
  395.     Top = 311
  396.     Width = 564
  397.     Height = 20
  398.     Align = alBottom
  399.     Alignment = taLeftJustify
  400.     BevelOuter = bvLowered
  401.     Font.Color = clWindowText
  402.     Font.Height = -11
  403.     Font.Name = 'MS Sans Serif'
  404.     Font.Style = []
  405.     ParentFont = False
  406.     TabOrder = 12
  407.   end
  408. end
  409.